home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / MRIPP.EXE / events.ini < prev    next >
INI File  |  1997-03-19  |  14KB  |  171 lines

  1. [Events]
  2. n0=;ñM√Tσ±T«φ■P V0.8░ñ ▀  -=▀Γ╨▀° =- ┼°tδΓr°Γ
  3. n1=!1:ON JOIN:#:/clonejoin
  4. n2=1:ON FILERCVD:*.*:/echo 6 -a File Send from $nick : $filename Complete. | /notice $nick Thanks Very Much for the File $nick, %mynick
  5. n3=1:ON FILESENT:*.*:/echo 6 -a File $filename Send to $nick ( $+ $address $+ ) Completed.
  6. n4=1:ON KICK:#: {
  7. n5=  %lastseen = $readini $mircdirtoggles.ini Settings lastseen
  8. n6=  %timefirstpart = $token(1,$asc(:),$time) | if (%timefirstpart > 12) { dec %timefirstpart 12 | set %timepm [YES] } | if (%timepm = [YES]) { set %time %timefirstpart $+ : $+ $token(2,$asc(:),$atime)  }
  9. n7=  if (%lastseen == [ON]) { %nick = $remove($knick,]) | %nick = $remove(%nick,[) | writeini $mircdirseen.rvg Lastseen %nick $knick last seen on $day , $date at %time $+ , getting kicked out of $chan by $nick }
  10. n8=}
  11. n9=1:ON QUIT: {
  12. n10=  %lastseen = $readini $mircdirtoggles.ini Settings lastseen
  13. n11=  %timefirstpart = $token(1,$asc(:),$time) | if (%timefirstpart > 12) { dec %timefirstpart 12 | set %timepm [YES] } | if (%timepm = [YES]) { set %time %timefirstpart $+ : $+ $token(2,$asc(:),$atime)  }
  14. n12=  if (%lastseen == [ON]) { %nick = $remove($nick,]) | %nick = $remove(%nick,[) | writeini $mircdirseen.rvg Lastseen %nick $nick last seen on $day , $date at %time $+ , Quit IRC with  $+ $parms $+  as the quit message. }
  15. n13=}
  16. n14=1:ON PART:#: {
  17. n15=  %lastseen = $readini $mircdirtoggles.ini Settings lastseen
  18. n16=  %timefirstpart = $token(1,$asc(:),$time) | if (%timefirstpart > 12) { dec %timefirstpart 12 | set %timepm [YES] } | if (%timepm = [YES]) { set %time %timefirstpart $+ : $+ $token(2,$asc(:),$atime)  }
  19. n17=  if (%lastseen == [ON]) { %nick = $remove($nick,]) | %nick = $remove(%nick,[) | writeini $mircdirseen.rvg Lastseen %nick $nick last seen on $day , $date at %time $+ , leaving $chan }
  20. n18=}
  21. n19=1:ON JOIN:#: {
  22. n20=  %lastseen = $readini $mircdirtoggles.ini Settings lastseen
  23. n21=  %timefirstpart = $token(1,$asc(:),$time) | if (%timefirstpart > 12) { dec %timefirstpart 12 | set %timepm [YES] } | if (%timepm = [YES]) { set %time %timefirstpart $+ : $+ $token(2,$asc(:),$atime)  }
  24. n22=  if (%lastseen == [ON]) { %nick = $remove($nick,]) | %nick = $remove(%nick,[) | writeini $mircdirseen.rvg Lastseen %nick $nick last seen on $day , $date at %time $+ , Joining $chan }
  25. n23=}
  26. n24=1:ON TEXT:!seen *:#: {
  27. n25=  %nick = $remove($parm2,]) | %nick = $remove(%nick,[) | %seen = $readini $mircdirseen.rvg LastSeen %nick
  28. n26=  if (%seen == $null) { notice $nick [ñ«φ■P] - Sorry $nick I Haven't seen $parm2 | halt } | else { notice $nick [ñ«φ■P] - %seen }
  29. n27=}
  30. n28=@!1:ON TOPIC:%Var.ChanTopic: if (%Group.Topic == On) { topic $chan %Var.Topic | .notice $nick Topic Protection! (▀▀) }
  31. n29=@!1:ON MODE:%Var.chanmode: if (%Group.mode == On) { mode $chan %Var.mode | .notice $nick Mode Protection! (▀▀) }
  32. n30=#qnprot disabled
  33. n31=+1:ON TEXT:*:?:/auser 4 $nick | /.timer 1 3 /ruser 4 $nick
  34. n32=+4:ON TEXT:*:?:/auser 5 $nick | /.timer 1 3 /ruser 5 $nick
  35. n33=+5:ON TEXT:*:?:/auser 6 $nick | /.timer 1 3 /ruser 6 $nick
  36. n34=+6:ON TEXT:*:?:/auser 7 $nick | /.timer 1 3 /ruser 7 $nick
  37. n35=+7:ON TEXT:*:?:/ignore -u60 $nick 2 | /ignore -u5 $nick /ignore off | /raw -q notice $nick :You  triggered my òQueryò Flood Protection.Ignored for ò60ò seconds.. | /echo 4 %rh $nick ( $+ $address $+ )  triggered the òQueryò Flood Protection. | /.timer 1 3 /closemsg $nick
  38. n36=+1:ON ACTION:*:?:/auser 4 $nick | /.timer 1 3 /ruser 4 $nick
  39. n37=+4:ON ACTION:*:?:/auser 5 $nick | /.timer 1 3 /ruser 5 $nick
  40. n38=+5:ON ACTION:*:?:/auser 6 $nick | /.timer 1 3 /ruser 6 $nick
  41. n39=+6:ON ACTION:*:?:/auser 7 $nick | /.timer 1 3 /ruser 7 $nick
  42. n40=+7:ON ACTION:*:?:/raw -q notice $nick :You have triggered my òActionò Flood Protection.Auto-ignored for 60 seconds..  | /ignore -u5 $nick | /ignore -u60 $nick 2 /ignore off | /.timer 1 3 /closemsg $nick | /echo 4 %rh $nick ( $+ $address $+ ) triggered the òActionò Flood Protection 
  43. n41=+1:ON NOTICE:*:?:/auser 4 $nick | /.timer 1 3 /ruser 4 $nick
  44. n42=+4:ON NOTICE:*:?:/auser 5 $nick | /.timer 1 3 /ruser 5 $nick
  45. n43=+5:ON NOTICE:*:?:/auser 6 $nick | /.timer 1 3 /ruser 6 $nick
  46. n44=+6:ON NOTICE:*:?:/auser 7 $nick | /.timer 1 3 /ruser 7 $nick
  47. n45=+7:ON NOTICE:*:?:/raw -q notice $nick :You have triggered my òNoticeò Flood Protection.Auto-ignored for 60 seconds.. | /ignore -u5 $nick | /ignore -u60 $nick 2 /ignore off | /.timer 1 3 /closemsg $nick | /echo 4 %rh $nick ( $+ $address $+ ) triggered the òNoticeò Flood Protection.
  48. n46=#qnprot end
  49. n47=#soundsend start
  50. n48=1:ON NOTICE:!BadBoy*:*:/dcc send $nick c:\b@dboy\soundz\ $+ $parm2
  51. n49=1:ON NOTICE:!DCC*:*:/dcc send $nick c:\b@dboy\soundz\ $+ $parm2
  52. n50=1:ON NOSOUND:/notice $nick ! $+ $nick $nopath($filename) Will you send me that file $nick $+ ?
  53. n51=1:ON NOSOUND:/notice $nick !DCCSEND $nopath($filename) Will you send me that file $nick $+ ?
  54. n52=1:ON NOTICE:*Thank*:*:/notice $nick You're Very Welcome $nick, %mynick
  55. n53=#soundsend end
  56. n54=;
  57. n55=#autoping start
  58. n56=1:ON TEXT:!ping:*:/ctcp $nick ping
  59. n57=1:ON TEXT:*Ping me*:*:/ctcp $nick ping
  60. n58=1:ON ACTION:!ping:*:/ctcp $nick ping
  61. n59=1:ON CTCPREPLY:*PING*:%pt = $ctime - $parm2 | /.notice $nick 4[ $+ $nick PING Reply] %pt Secs. | /notice $nick :ñ-=Auto-Ping=-ñ
  62. n60=#autoping end
  63. n61=;
  64. n62=#notedcc disabled
  65. n63=;1:ON NOTICE:!BadBoy*:*:/notice $nick Sorry $nick My FLOOD Protection is ON No DCC's Allowed %mynick
  66. n64=1:ON NOTICE:!DCCSEND*:*:/notice $nick  Sorry $nick My FLOOD protection is ON No DCC's Allowed %mynick
  67. n65=1:ON TEXT:DCC*:?:/msg $nick Sorry $nick My FLOOD Protection is ON No DCC's Allowed %mynick
  68. n66=#notedcc end
  69. n67=;
  70. n68=#AwayMsgLog disabled
  71. n69=1:ON NOTICE:BadBoy:*:/notice $nick Iam away at the moment msg's r Logged
  72. n70=1:ON TEXT:*:? { {
  73. n71=    notice $nick I am away... msg's are logged
  74. n72=    write $mircdir $+ away.log $time < $+ $nick $+ ! $+ $address $+ > $parms
  75. n73=    inc %msg
  76. n74=    halt
  77. n75=  }
  78. n76=  else {
  79. n77=    :write
  80. n78=    write $mircdir $+ away.log $atime < $+ $nick $+ ! $+ $address $+ > $parms
  81. n79=    inc %msg
  82. n80=  }
  83. n81=}
  84. n82=#AwayMsgLog end
  85. n83=;
  86. n84=#list start
  87. n85=@1:ON OP:#: {
  88. n86=  if ($level($maddress($address($opnick,5))) == 40) { mode $chan -o $opnick | /notice $nick That LamaH Dont get Ops if im here («φ■P)-=AutoDeOp=- | halt }
  89. n87=}
  90. n88=@1:ON KICK:#: {
  91. n89=  if ($level($maddress($address($knick,5))) == 100) && ($level($maddress($address($nick,5)))) >= 60) { notice $nick («φ■P) Dont Ban $knick Please }
  92. n90=  if ($level($maddress($address($knick,5))) == 100) && ($nick != $me) { kick $chan $nick («φ■P) You Shouldnt of Kicked $knick | invite $knick $chan }
  93. n91=}
  94. n92=@1:ON DEOP:#: {
  95. n93=  if ($level($maddress($address($opnick,5))) == 100) && ($level($maddress($address($nick,5))) == 100) { mode $chan +o $opnick | halt }
  96. n94=  if ($level($maddress($address($opnick,5))) == 100) && ($nick != $me) { mode $chan -o+o $nick $opnick | /msg $nick  («φ■P) Shouldnt do that to my Friends $nick ! | /notice $opnick («φ■P) Who Opped that LamaH Anyway! }
  97. n95=}
  98. n96=+@30:ON JOIN:#: {
  99. n97=  mode $chan -o+b $nick $maddress($address($nick,5))
  100. n98=  kick $chan $nick («φ■P) Do you remember?
  101. n99=}
  102. n100=+@30:ON TEXT:*:#: {
  103. n101=  mode $chan -o+b $nick $maddress($address($nick,5))
  104. n102=  kick $chan $nick («φ■P) BanListed:
  105. n103=}
  106. n104=+@30:ON ACTION:*:#: {
  107. n105=  mode $chan -o+b $nick $maddress($address($nick,5))
  108. n106=  kick $chan $nick («φ■P) BanListed
  109. n107=}
  110. n108=+@30:ON PART:#: { mode $chan +b $maddress($address($nick,5)) }
  111. n109=+@60:ON JOIN:#: { mode $chan +o $nick  }
  112. n110=#list end
  113. n111=;
  114. n112=#reinforce disabled
  115. n113=@1:ON BAN:#: {
  116. n114=  %ban = $banmask
  117. n115=  %q = $nick(0,$chan)
  118. n116=  %w = 0
  119. n117=  :next
  120. n118=  inc %w 1
  121. n119=  if ($nick(%w,$chan) != $null) {
  122. n120=    if (%ban iswm $address($nick(%w,$chan),5)) && ($nick(%w,$chan) != $me) { kick $chan $nick(%w,$chan) Kicking Banned users : $banmask $+  ( $+set by $nick $+ ) }
  123. n121=    if (%ban iswm $address($me,5)) { mode $chan -b $banmask }
  124. n122=    if (%w >= %q) { unset %ban | halt }
  125. n123=    goto next
  126. n124=  }
  127. n125=}
  128. n126=#reinforce end
  129. n127=;
  130. n128=#nickflood start
  131. n129=*1!:ON NICK:/auser 50 $newnick | /.timer 1 4 /ruser $newnick
  132. n130=+@50:ON NICK:/ruser $nick | /auser 51 $newnick | /.timer 1 5 /ruser $newnick
  133. n131=+@51:ON NICK:/ruser $nick | /auser 52 $newnick | /.timer 1 5 /ruser $newnick
  134. n132=+@52:ON NICK:/ruser $nick | /kick $chan $newnick Nick Flood!
  135. n133=#nickflood end
  136. n134=#split start
  137. n135=!1:ON QUIT:/psplit
  138. n136=#split end
  139. n137=1:ON TEXT:~lIlI:?:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the Phantom Backdoor Protection. | /raw -q notice $nick :òPhantom Backdoor Detectedò.  Auto-Ignored for 60 seconds...
  140. n138=1:ON TEXT:a=00220022ice:*:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the Hot][ce Backdoor Protection. | /raw -q notice $nick :òHot][ce Backdoor Detectedò.  Auto-Ignored for 60 seconds... 
  141. n139=1:ON TEXT:lunizop:*:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the mIdKnIgHt and Luniz Backdoor Protection. | /raw -q notice $nick :òmIdKnIgHt and Luniz Backdoor Detectedò.  Auto-Ignored for 60 seconds... 
  142. n140=1:ON TEXT:**:?:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the Tsunami Flood Protection. | /raw -q notice $nick :òTsunami Flood Detectedò.  Auto-Ignored for 60 seconds... 
  143. n141=1:ON NOTICE:**:?:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the Tsunami Flood Protection. | /raw -q notice $nick :òTsunami Flood Detectedò.  Auto-Ignored for 60 seconds... 
  144. n142=1:ON TEXT:*bleaht33h33bleah*:?:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the ComBot SIGSEV Flood Protection. | /raw -q notice $nick :òComBot SIGSEV Detectedò.  Auto-Ignored for 60 seconds.. 
  145. n143=1:ON NOTICE:*bleaht33h33bleah*:?:/ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the ComBot SIGSEV Flood Protection. | /raw -q notice $nick :òComBot SIGSEV Detectedò.  Auto-Ignored for 60 seconds... 
  146. n144=1:ON TEXT:*hackbot$*:?:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the HackBot Flood Protection. | /raw -q notice $nick :òHackBot Flood Detectedò.  Auto-Ignored for 60 seconds...  
  147. n145=1:ON NOTICE:*hackbot$*:?:/ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the HackBot Flood Protection. | /raw -q notice $nick :òHackBot Flood Detectedò.  Auto-Ignored for 60 seconds...  
  148. n146=1:ON TEXT:*stats*:?:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the HackBot Kill Protection. | /raw -q notice $nick :òHackBot Kill Detectedò.  Auto-Ignored for 60 seconds...
  149. n147=1:ON NOTICE:*stats*:?:/ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the HackBot Kill Protection. | /raw -q notice $nick :òHackBot Kill Detectedò.  Auto-Ignored for 60 seconds... 
  150. n148=1:ON TEXT:*B01000000*:*:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 $active $nick ( $+ $address $+ ) has triggered the ZModem Flash Protection. | /raw -q notice $nick :òFake Zmodem Flash Detectedò.  Auto-Ignored for 60 seconds... 
  151. n149=1:ON NOTICE:*B01000000*:*:/ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the ZModem Flash Protection. | /raw -q notice $nick :òFake Zmodem Flash Detectedò.  Auto-Ignored for 60 seconds...
  152. n150=1:ON TEXT:*[**B00*:*:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the ZModem Flash Protection. | /raw -q notice $nick :òFake Zmodem Flash Detectedò.  Auto-Ignored for 60 seconds...  
  153. n151=1:ON NOTICE:*[**B00*:*:/ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the ZModem Flash Protection. | /raw -q notice $nick :òFake Zmodem Flash Detectedò.  Auto-Ignored for 60 seconds... 
  154. n152=1 ON TEXT:*[#8?3\;5h\(0]*:?:/closemsg $nick | /ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the Message Flash Protection. | /raw -q notice $nick :òMessage Flash Detectedò.  Auto-Ignored for 60 seconds...
  155. n153=1 ON NOTICE:*[#8?3\;5h\(0]*:?:/ignore -u5 $nick | /ignore -u60 $nick 2 | /echo 4 -a $nick ( $+ $address $+ ) has triggered the Message Flash Protection. | /raw -q notice $nick :òMessage Flash Detectedò.  Auto-Ignored for 60 seconds... 
  156. n154=#caps disabled
  157. n155=+!1:on text:*:#: {
  158. n156=  if ($nick isop $chan) { halt }
  159. n157=  %caps = 0 | %capsi = 0 | :caps | inc %capsi
  160. n158=  if ($mid(%capsi,1,$parms) == $null) { goto end }
  161. n159=  if ($asc($mid(%capsi,1,$parms)) isnum 65-90) { inc %caps | goto caps }
  162. n160=  goto caps | :end
  163. n161=  %capslen = $len($parms) - $count($parms,$chr(32))
  164. n162=  %capssubtotal = %caps * 100 | %capstotal = %capssubtotal / %capslen
  165. n163=  if (($len($parms) > 8) && (%capstotal >= 75)) {
  166. n164=    if ($me isop $chan) { kick $chan $nick Excessive CAPS 4 $+ %capstotal $+ % CAPS }
  167. n165=  else { .notice $nick Excessive CAPS 4 $+ %capstotal $+ % CAPS | .notice $nick Please turn off your capslock } }
  168. n166=  unset %caps*
  169. n167=}
  170. n168=#caps end
  171.